home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-03 / qbasicpg.zip / GETNAMES.BAS < prev    next >
BASIC Source File  |  1989-08-31  |  247b  |  12 lines

  1. ' GETNAMES.BAS
  2. ' This program gets first and last names from the user and displays
  3. '   them in uppercase.
  4.  
  5. CLS
  6.  
  7. INPUT "First name:  ", firstName$
  8. INPUT "Last name:   ", lastName$
  9. PRINT
  10. PRINT UCASE$(lastName$); ", "; UCASE$(firstName$)
  11.  
  12.